home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.19970929-19971216 / 000156_news@newsmaster….columbia.edu _Tue Oct 21 10:05:15 1997.msg < prev    next >
Internet Message Format  |  2020-01-01  |  4KB
  1. Return-Path: <news@newsmaster.cc.columbia.edu>
  2. Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
  3.     by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id KAA23004
  4.     for <kermit.misc@watsun.cc.columbia.edu>; Tue, 21 Oct 1997 10:05:15 -0400 (EDT)
  5. Received: (from news@localhost)
  6.     by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id KAA16025
  7.     for kermit.misc@watsun; Tue, 21 Oct 1997 10:05:15 -0400 (EDT)
  8. Path: news.columbia.edu!watsun.cc.columbia.edu!fdc
  9. From: fdc@watsun.cc.columbia.edu (Frank da Cruz)
  10. Newsgroups: comp.protocols.kermit.misc
  11. Subject: Re: login script beeps unexpectedly
  12. Date: 21 Oct 1997 14:05:11 GMT
  13. Organization: Columbia University
  14. Lines: 82
  15. Message-ID: <62icqn$582$1@apakabar.cc.columbia.edu>
  16. References: <62ejvl$fpk$1@eskinews.eskimo.com> <62ft4g$j94$1@apakabar.cc.columbia.edu> <62h9lb$pbm$1@eskinews.eskimo.com>
  17. NNTP-Posting-Host: watsun.cc.columbia.edu
  18. Xref: news.columbia.edu comp.protocols.kermit.misc:7934
  19.  
  20. In article <62h9lb$pbm$1@eskinews.eskimo.com>,
  21. Jim Osborn <jimo@eskimo.com> wrote:
  22. : In article <62ft4g$j94$1@apakabar.cc.columbia.edu>,
  23. : Frank da Cruz <fdc@watsun.cc.columbia.edu> wrote:
  24. : >In article <62ejvl$fpk$1@eskinews.eskimo.com>,
  25. : >Jim Osborn <jimo@eskimo.com> wrote:
  26. : >: I use the following macro to connect with my ISP...
  27. : >:
  28. : >And which Kermit program are you using?
  29. : 
  30. : Oops, sorry - C-Kermit 6.0...
  31. : 
  32. : >It's not obvious from your script, but if INPUT ECHO is ON, and if the
  33. : >service sends a beep character, then Kermit will echo it.
  34. : 
  35. : I guessed that, so I double checked, and the ISP sends no beeps.
  36. : I watched a cycle of at least five toxic modem offers, and got a beep
  37. : on each cycle, so I'm pretty confident it's not a simple buffering
  38. : issue, per your comments below.  That is, it's not flushing a beep
  39. : from a prior login attempt.  When I say "beep" I'm really referring
  40. : to the "echo \007" command, of course.
  41. : 
  42. : >It just rings the bell or beeps, whatever your console is set up to
  43. : >do normally when it gets an ASCII BEL character.
  44. : >
  45. : >: and the
  46. : >: good old "echo \007" command?  The effects are very different.
  47. : >: 
  48. : >So you must be using Kermit 95.  In this case, the BEEP command can produce
  49. : >different sounds...
  50. : 
  51. : Nope, Unix.
  52. :
  53. Well, then any difference between "beep" and "echo \007" is puzzling indeed.
  54. In UNIX, "beep" translates, ultimately, to "putchar(\07);" and "echo \007"
  55. becomes 'printf("%s", "\07");'.  Both putchar and printf used buffered i/o,
  56. and they are both printing the same thing.
  57.  
  58. OK, let's look at your script more closely:
  59.  
  60. : >: define eskimo {
  61. : >:     while not defined \%1 {
  62. : >:         askq \%1 {Eskimo Password: }
  63. : >:     }
  64. : >:     :retry
  65. : >:     dial 258-0759
  66.  
  67. You need an IF FAIL statement here.  You don't want the script to keep
  68. executing if your DIAL command fails.
  69.  
  70. : >:     in 30 {Your Selection ==>} #Initial selector, choose service
  71.  
  72. Ditto.
  73.  
  74. : >:     output 1\13                #Select Eskimo
  75. : >:     in 60 login:               #Start login process
  76.  
  77. Ditto.
  78.  
  79. : >:     out jimo\13                #Look for: Hello ,CLI,,27,xxx@seattle2
  80. : >:     clear input
  81. : >:     in 30 {Welcome to eskimo.com}      #Read Annex ID string
  82.  
  83. Ditto.  In fact, if this one fails, you can fall through the next test
  84. and then (since the subsequent INPUTs are also untested), out comes the beep.
  85.  
  86. : >:     xif \find({CLI,,27},\v(input)) {  #Start over if toxic modem
  87. : >:         xif \find({@seattle2},\v(input)) {
  88. : >:             echo {Aborting 27,,2}
  89. : >:             goto retry
  90. : >:         }
  91. : >:     }
  92. : >:     in 30 Password:
  93. : >:     out \%1\13
  94. : >:     in 60 {Main Command?}
  95. : >:     out {!}                   #Start shell
  96. : >: #    beep             #doesn't beep until escape back to kermit
  97. : >:     echo \007    #^G
  98. : >:     connect /quietly
  99. : >: }
  100.  
  101. - Frank